home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Third Party Demos / Utilities / In⁄Out™ / In_Out™ / card_12468.txt < prev    next >
Text File  |  1990-04-09  |  2KB  |  106 lines
  1. -- card: 12468 from stack: in
  2. -- bmap block id: 12551
  3. -- flags: 0000
  4. -- background id: 2649
  5. -- name: view
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=104 top=69 right=88 bottom=258
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New Button
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   go to card "Namesonly"
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 2 (button)
  28. -- low flags: 00
  29. -- high flags: 2000
  30. -- rect: left=104 top=49 right=68 bottom=258
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 1
  34. -- font id: 0
  35. -- text size: 12
  36. -- style flags: 0
  37. -- line height: 16
  38. -- part name: New Button
  39. ----- HyperTalk script -----
  40. on mouseUp
  41.   go to card SLBnames
  42. end mouseUp
  43.  
  44.  
  45.  
  46. -- part 3 (button)
  47. -- low flags: 00
  48. -- high flags: 2000
  49. -- rect: left=104 top=19 right=38 bottom=258
  50. -- title width / last selected line: 0
  51. -- icon id / first selected line: 0 / 0
  52. -- text alignment: 1
  53. -- font id: 0
  54. -- text size: 12
  55. -- style flags: 0
  56. -- line height: 16
  57. -- part name: New Button
  58. ----- HyperTalk script -----
  59. on mouseUp
  60.   go to card ss
  61. end mouseUp
  62.  
  63.  
  64.  
  65. -- part 5 (button)
  66. -- low flags: 00
  67. -- high flags: 2000
  68. -- rect: left=105 top=92 right=132 bottom=258
  69. -- title width / last selected line: 0
  70. -- icon id / first selected line: 0 / 0
  71. -- text alignment: 1
  72. -- font id: 0
  73. -- text size: 12
  74. -- style flags: 0
  75. -- line height: 16
  76. -- part name: New Button
  77. ----- HyperTalk script -----
  78. on mouseUp
  79.   show card field "workgroup"
  80.   repeat until the mouse is down
  81.     show card field "workgroup"
  82.   end repeat
  83.   hide card field "workgroup"
  84.   go to card "SLBnames"
  85. end mouseUp
  86.  
  87.  
  88.  
  89. -- part 6 (field)
  90. -- low flags: 80
  91. -- high flags: 0004
  92. -- rect: left=29 top=136 right=236 bottom=352
  93. -- title width / last selected line: 0
  94. -- icon id / first selected line: 0 / 0
  95. -- text alignment: 0
  96. -- font id: 20
  97. -- text size: 18
  98. -- style flags: 0
  99. -- line height: 24
  100. -- part name: workgroup
  101.  
  102.  
  103. -- part contents for card part 6
  104. ----- text -----
  105. This is the currently selected WorkGroup.
  106. You can also select a new WorkGroup here (if applicable).  This will show you all the names in that selected workgroup.